home *** CD-ROM | disk | FTP | other *** search
/ IRIX Base Documentation 2001 May / SGI IRIX Base Documentation 2001 May.iso / usr / share / catman / p_man / cat3 / f90 / len.z / len
Encoding:
Text File  |  1998-10-30  |  1.5 KB  |  45 lines
  1. LEN(3I)                                                Last changed: 1-6-98
  2.  
  3.  
  4. NNAAMMEE
  5.      LLEENN - Determines the length of a character string
  6.  
  7. SSYYNNOOPPSSIISS
  8.      LLEENN (([SSTTRRIINNGG==]_s_t_r_i_n_g))
  9.  
  10. IIMMPPLLEEMMEENNTTAATTIIOONN
  11.      UNICOS, UNICOS/mk, and IRIX systems
  12.  
  13. SSTTAANNDDAARRDDSS
  14.      Fortran 90
  15.  
  16. DDEESSCCRRIIPPTTIIOONN
  17.      The LLEENN intrinsic function takes Fortran character string arguments
  18.      and returns an integer length.  This function accepts the following
  19.      argument:
  20.  
  21.      _s_t_r_i_n_g    Must be of type character.  It can be scalar or array
  22.                valued.
  23.  
  24.      LLEENN is an inquiry function.  The name of this intrinsic can be passed
  25.      as an argument.
  26.  
  27. RREETTUURRNN VVAALLUUEESS
  28.      The result type, type parameter, and shape are default integer scalar.
  29.      The result has a value equal to the number of characters in _s_t_r_i_n_g if
  30.      it is a scalar or in an element of _s_t_r_i_n_g if it is array valued.
  31.  
  32. EEXXAAMMPPLLEESS
  33.      The following program returns the length of the character string II==3377:
  34.  
  35.           PROGRAM LENTEST
  36.           I=LEN('|...+....1....+....2....+....3....+..')
  37.           PRINT *,I
  38.           STOP
  39.           END
  40.  
  41. SSEEEE AALLSSOO
  42.      _I_n_t_r_i_n_s_i_c _P_r_o_c_e_d_u_r_e_s _R_e_f_e_r_e_n_c_e _M_a_n_u_a_l, publication SR-2138, for the
  43.      printed version of this man page.
  44.  
  45.